home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1995 August: Tool Chest / Dev.CD Aug 95 TC / Dev.CD Aug 95 TC.toast / Tool Chest / Interfaces / UniversalInterfaces 2.1B1 / AIncludes / DeskBus.a < prev    next >
Encoding:
Text File  |  1995-04-18  |  3.1 KB  |  130 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        DeskBus.a
  3. ;
  4. ;    Contains:    Apple Desktop Bus (ADB) Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Package:    Universal Interfaces 2.1ß1 in “MPW Prerelease” on ETO #17
  8. ;
  9. ;    Copyright:    © 1984-1995 by Apple Computer, Inc.
  10. ;                All rights reserved.
  11. ;
  12. ;    Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13. ;                stack.  Include the file and version information (from above)
  14. ;                in the problem description and send to:
  15. ;                    Internet:    apple.bugs@applelink.apple.com
  16. ;                    AppleLink:    APPLE.BUGS
  17. ;
  18. ;
  19.  
  20.     IF &TYPE('__DESKBUS__') = 'UNDEFINED' THEN
  21. __DESKBUS__ SET 1
  22.  
  23.  
  24.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  25.     include 'Types.a'
  26.     ENDIF
  27. ;        include 'ConditionalMacros.a'                                ;
  28.  
  29.     IF &TYPE('__MIXEDMODE__') = 'UNDEFINED' THEN
  30.     include 'MixedMode.a'
  31.     ENDIF
  32. ; typedef char                 ADBAddress
  33. ADBOpBlock                 RECORD    0
  34. dataBuffPtr                 ds.l   1        ; offset: $0 (0)        ; address of data buffer 
  35. opServiceRtPtr             ds.l   1        ; offset: $4 (4)        ; service routine pointer 
  36. opDataAreaPtr             ds.l   1        ; offset: $8 (8)        ; optional data area address 
  37. sizeof                     EQU *            ; size:   $C (12)
  38.                         ENDR
  39.  
  40. ; typedef struct ADBOpBlock  ADBOpBlock
  41. ; typedef ADBOpBlock         *ADBOpBPtr
  42. ADBDataBlock             RECORD    0
  43. devType                     ds.b   1        ; offset: $0 (0)        ; device type 
  44. origADBAddr                 ds.b   1        ; offset: $1 (1)        ; original ADB Address 
  45. dbServiceRtPtr             ds.l   1        ; offset: $2 (2)        ; service routine pointer 
  46. dbDataAreaAddr             ds.l   1        ; offset: $6 (6)        ; data area address 
  47. sizeof                     EQU *            ; size:   $A (10)
  48.                         ENDR
  49.  
  50. ; typedef struct ADBDataBlock  ADBDataBlock
  51. ; typedef ADBDataBlock         *ADBDBlkPtr
  52. ADBSetInfoBlock         RECORD    0
  53. siService                 ds.l   1        ; offset: $0 (0)        ; service routine pointer 
  54. siDataAreaAddr             ds.l   1        ; offset: $4 (4)        ; data area address 
  55. sizeof                     EQU *            ; size:   $8 (8)
  56.                         ENDR
  57.  
  58. ; typedef struct ADBSetInfoBlock  ADBSetInfoBlock
  59. ; typedef ADBSetInfoBlock     *ADBSInfoPtr
  60. ;
  61. ; pascal void ADBReInit(void)
  62. ;
  63.     IF ¬ GENERATINGCFM THEN
  64.         _ADBReInit:    OPWORD    $A07B
  65.     ELSE
  66.         IMPORT_CFM_FUNCTION    ADBReInit
  67.     ENDIF
  68.  
  69. ;
  70. ; pascal OSErr ADBOp(Ptr data, ADBCompletionUPP compRout, Ptr buffer, short commandNum)
  71. ;
  72.     IF GENERATINGCFM THEN
  73.         IMPORT_CFM_FUNCTION    ADBOp
  74.     ENDIF
  75.  
  76. ;
  77. ; pascal short CountADBs(void)
  78. ;
  79.     IF ¬ GENERATINGCFM THEN
  80.         ; returns: 
  81.         ;     short             <= D0
  82.         _CountADBs:    OPWORD    $A077
  83.     ELSE
  84.         IMPORT_CFM_FUNCTION    CountADBs
  85.     ENDIF
  86.  
  87. ;
  88. ; pascal ADBAddress GetIndADB(ADBDataBlock *info, short devTableIndex)
  89. ;
  90.     IF ¬ GENERATINGCFM THEN
  91.         ; parameters: 
  92.         ;     info              => A0
  93.         ;     devTableIndex     => D0
  94.         ; returns: 
  95.         ;     ADBAddress        <= D0
  96.         _GetIndADB:    OPWORD    $A078
  97.     ELSE
  98.         IMPORT_CFM_FUNCTION    GetIndADB
  99.     ENDIF
  100.  
  101. ;
  102. ; pascal OSErr GetADBInfo(ADBDataBlock *info, ADBAddress adbAddr)
  103. ;
  104.     IF ¬ GENERATINGCFM THEN
  105.         ; parameters: 
  106.         ;     info              => A0
  107.         ;     adbAddr           => D0
  108.         ; returns: 
  109.         ;     OSErr             <= D0
  110.         _GetADBInfo:    OPWORD    $A079
  111.     ELSE
  112.         IMPORT_CFM_FUNCTION    GetADBInfo
  113.     ENDIF
  114.  
  115. ;
  116. ; pascal OSErr SetADBInfo(const ADBSetInfoBlock *info, ADBAddress adbAddr)
  117. ;
  118.     IF ¬ GENERATINGCFM THEN
  119.         ; parameters: 
  120.         ;     info              => A0
  121.         ;     adbAddr           => D0
  122.         ; returns: 
  123.         ;     OSErr             <= D0
  124.         _SetADBInfo:    OPWORD    $A07A
  125.     ELSE
  126.         IMPORT_CFM_FUNCTION    SetADBInfo
  127.     ENDIF
  128.  
  129.     ENDIF ; __DESKBUS__
  130.